object DataModule1: TDataModule1
  OldCreateOrder = False
  Height = 356
  Width = 599
  object ADOConnection1: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=.\VGNDB.mdb;Mode=Re' +
      'adWrite;Persist Security Info=False'
    LoginPrompt = False
    Mode = cmReadWrite
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 48
    Top = 24
  end
  object ADOCommand1: TADOCommand
    Connection = ADOConnection1
    Parameters = <>
    Left = 48
    Top = 80
  end
  object adoUsers: TADOTable
    Connection = ADOConnection1
    CursorType = ctStatic
    IndexFieldNames = 'Name'
    TableName = 'Users'
    Left = 152
    Top = 24
    object adoUsersUserID: TAutoIncField
      FieldName = 'UserID'
      ReadOnly = True
    end
    object adoUsersName: TWideStringField
      FieldName = 'Name'
      Size = 128
    end
    object adoUsersPasswrd: TWideStringField
      FieldName = 'Passwrd'
      Size = 16
    end
    object adoUsersDolgnost: TWideStringField
      FieldName = 'Dolgnost'
      Size = 32
    end
    object adoUsersRights: TFloatField
      FieldName = 'Rights'
    end
  end
  object dsUsers: TDataSource
    AutoEdit = False
    DataSet = adoUsers
    Left = 184
    Top = 24
  end
end
